home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Softdisk G-S 93
/
SGDS 93.2mg
/
SDGS.93
/
SDB93
/
B
/
DIV.DRILL
(
.txt
)
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS
UTF-8
Wrap
Applesoft BASIC Source Code
|
1989-05-22
|
850 b
|
26 lines
|
[FC] Applesoft BASIC Program (0x0801)
1 PRINT CHR$(21): HGR2
2 TEXT : HOME
3 VTAB 12: HTAB 12: PRINT "ONE MOMENT PLEASE..."
10 POKE 103,1: POKE 104,96: POKE 24576,0: PRINT CHR$(4)"-DIVISION.DRILLS"
20 REM DOCUMENTATION FOR DIVISION.DRILLS
30 REM 160 ERROR IN CARRY
40 REM 470 ERROR IN ANSWER
50 REM 940 DRILL INITILIZATION
60 REM 990 SET UP A PROBLEM-DISPLAY
70 REM 1230 PROBLEM DRILL PROCEDURE
80 REM 1340 PAUSE PROCEDURE
90 REM 1440 STUDENT SET UP
100 REM 1650 STUDENT WRAPUP
110 REM 1860 SET UP PROBLEM ON DIVISION
120 REM 2410 SOUND ROUTINE
130 REM 2460 SOUND CORRECT
140 REM 2490 SOUND ERROR
150 REM 2510 TEACHER SET UP
160 REM 2830 BANNER
170 REM 3120 TEACHER INITILIZATION
300 REM DATA DIRECTORY
310 REM A$=GEN'L PURPOSE USE IN GET
320 REM A(7)=ANS ARRAY:C(7)=CARRY ARRAY:D$=CHR$(4)
330 REM E(4)=ERROR COUNTS 0-CARRY,1-ANS,2-CARRY RETRY,3-ANS RETRY
340 REM M9=TOTAL # PROBLEMS:N$=STUDENT NAME:P=# CURRENT PROBLEM
350 REM S0=SIZE # TO DIVIDE:N0=SIZE # TO DIVIDE BY